(require 'color-theme)
;;;;;;;;;;;;;;;;;;;;  color theme dimilar gui  ;;;;;;;;;;;;;;;;;;;;
(defun color-theme-dimilar ()
  "A color theme based on Tango Palette."
  (interactive)
  (color-theme-install
   '(color-theme-dimilar
     ((background-mode . dark)
      (background-color . "#1e1e27")
      (foreground-color . "#CFBFAD")
      (cursor-color     . "#8B8BFF")
      (mouse-color      . "gold1"))
     ((help-highlight-face . underline)
      (ibuffer-dired-buffer-face . font-lock-function-name-face)
      (ibuffer-help-buffer-face . font-lock-comment-face)
      (ibuffer-hidden-buffer-face . font-lock-warning-face)
      (ibuffer-occur-match-face . font-lock-warning-face)
      (ibuffer-read-only-buffer-face . font-lock-type-face)
      (ibuffer-special-buffer-face . font-lock-keyword-face)
      (ibuffer-title-face . font-lock-type-face))
     (diary ((((min-colors 88) (class color) (background dark)) (:foreground "plum" :weight normal))))
     (mumamo-background-chunk-major ((((class color) (min-colors 88) (background dark)) nil)))
     (mumamo-background-chunk-submode1 ((((class color) (min-colors 88) (background dark)) nil)))
     (mumamo-background-chunk-submode2 ((((class color) (min-colors 88) (background dark)) nil)))
     (mumamo-background-chunk-submode3 ((((class color) (min-colors 88) (background dark)) nil)))
     (mumamo-background-chunk-submode4 ((((class color) (min-colors 88) (background dark)) nil)))
     (font-lock-builtin-face ((((class color) (min-colors 88) (background dark)) (:foreground "LightSteelBlue" :weight normal))))
     (font-lock-comment-delimiter-face ((default (:inherit font-lock-comment-face :slant italic)) (((class color) (min-colors 16)) nil)))
     (font-lock-comment-face ((((class color) (min-colors 88) (background dark)) (:foreground "RoyalBlue2" :slant italic))))
     (font-lock-constant-face ((((class color) (min-colors 88) (background dark)) (:foreground "Aquamarine" :weight normal))))
     (font-lock-function-name-face ((((class color) (min-colors 88) (background dark)) (:foreground "DeepPink" :weight normal :height 1.0 :width extra-expanded))))
     (font-lock-keyword-face ((((class color) (min-colors 88) (background dark)) (:foreground "#7ec0ee" :weight normal :height 1.0 :width extra-expanded))))
     (font-lock-negation-char-face ((t (:foreground "DeepSkyBlue" :weight normal))))
     (font-lock-preprocessor-face ((t (:inherit font-lock-builtin-face :foreground "violet"))))
     (font-lock-regexp-grouping-backslash ((t (:inherit bold :foreground "IndianRed"))))
     (font-lock-regexp-grouping-construct ((t (:inherit bold :foreground "BlueViolet"))))
     (font-lock-string-face ((((class color) (min-colors 88) (background dark)) (:foreground "LightSalmon1":weight bold))))
     (font-lock-type-face ((((class color) (min-colors 88) (background dark)) (:foreground "PaleGreen" :weight normal))))
     (font-lock-variable-name-face ((((class color) (min-colors 88) (background dark)) (:foreground "LightGoldenrod" :weight normal))))
     (holiday ((((class color) (background dark)) (:background "SteelBlue" :foreground "white" :weight semi-bold))))
     (info-xref ((t (:inherit link :foreground "SkyBlue1"))))
     (cparen-around-quote-face ((t (:foreground "SaddleBrown"))))
     ;; (cal-china-x-priority1-holidays t)
     ;; (cal-china-x-priority2-holidays t)
     (ac-selection-face ((t (:background "royal blue" :foreground "white"))))
     (company-template-field ((((background dark)) (:background "LightSkyBlue3" :foreground "black"))))
     (company-tooltip ((t (:background "lightgray" :foreground "black"))))
     (company-tooltip-selection ((t (:inherit company-tooltip :background "royal blue"))))
     (matlab-cross-function-variable-face ((t (:foreground "blue" :underline nil :slant italic :weight bold))))
     (matlab-nested-function-keyword-face ((t (:foreground "gold" :underline nil :slant italic))))
     (menu ((t (:background "pink" :foreground "LightGreen"))))
     ;; (diredp-display-msg ((t nil)))
     (minibuffer-prompt ((((background dark)) (:foreground "LightBlue"))))
     (diredp-exec-priv ((t (:background "LightSteelBlue" :foreground "black"))))
     (diredp-file-name ((t (:foreground "gray"))))
     (diredp-flag-mark-line ((t (:background "pink" :foreground "black"))))
     (diredp-no-priv ((t (:background "LightGray" :foreground "black"))))
     (diredp-other-priv ((t (:background "PaleGoldenrod" :foreground "black"))))
     (diredp-read-priv ((t (:background "MediumAquamarine" :foreground "black"))))
     (tooltip ((((class color)) (:stipple nil :background "SkyBlue" :foreground "black"))))
     (w3m-anchor ((((class color) (background dark)) (:foreground "LightSkyBlue" :weight normal))))
     (w3m-arrived-anchor ((((class color) (background dark)) (:foreground "LightSkyBlue" :weight normal))))
     (w3m-history-current-url ((t (:background "DodgerBlue4"))))
     (w3m-bold ((t (:foreground "white" :weight bold))))
     (w3m-current-anchor ((t (:foreground "pink" :underline t :weight bold))))
     (w3m-form-button ((((type x w32 mac) (class color)) (:background "LightGreen" :foreground "DeepPink" :box (:line-width 2 :style released-button) :weight normal))))
     (w3m-header-line-location-title ((((class color) (background dark)) (:background "Gray20" :foreground "SteelBlue" :weight normal))))
     (w3m-insert ((((class color) (background dark)) (:foreground "DeepPink"))))
     (w3m-italic ((t (:foreground "DodgerBlue1" :slant italic))))
     (w3m-strike-through ((((class color)) (:foreground "red" :strike-through t))))
     (woman-addition ((t (:foreground "pink"))))
     (woman-bold ((((background dark)) (:foreground "SkyBlue1" :weight bold))))
     (woman-italic ((((background dark)) (:foreground "DeepPink1" :underline t :slant italic))))
     (w3m-underline ((t (:foreground "pink" :underline t))))
     (gnus-cite-attribution-face ((t (:lforeground "lemon chiffon" :bold t))))
     (gnus-cite-face-1 ((t (:foreground "LightSalmon"))))
     (gnus-cite-face-2 ((t (:foreground "Khaki"))))
     (gnus-cite-face-3 ((t (:foreground "Coral"))))
     (gnus-cite-face-4 ((t (:foreground "yellow green"))))
     (gnus-cite-face-5 ((t (:foreground "dark khaki"))))
     (gnus-cite-face-6 ((t (:foreground "bisque"))))
     (gnus-cite-face-7 ((t (:foreground "peru"))))
     (gnus-cite-face-8 ((t (:foreground "light coral"))))
     (gnus-cite-face-9 ((t (:foreground "plum"))))
     (gnus-group-mail-1-empty-face ((t (:foreground "White"))))
     (gnus-group-mail-1-face ((t (:bold t :foreground "White"))))
     (gnus-group-mail-2-empty-face ((t (:foreground "light cyan"))))
     (gnus-group-mail-2-face ((t (:bold t :foreground "light cyan"))))
     (gnus-group-mail-3-empty-face ((t (:foreground "LightBlue"))))
     (gnus-group-mail-3-face ((t (:bold t :foreground "LightBlue"))))
     (gnus-group-mail-low-empty-face ((t (:foreground "Aquamarine"))))
     (gnus-group-mail-low-face ((t (:bold t :foreground "Aquamarine"))))
     (gnus-group-news-1-empty-face ((t (:foreground "White"))))
     (gnus-group-news-1-face ((t (:bold t :foreground "White"))))
     ;; (gnus-group-news-2-empty-face ((t (:foreground "light cyan"))))
     ;; (gnus-group-news-2-face ((t (:bold t :foreground "light cyan"))))
     ;; (gnus-group-news-3-empty-face ((t (:foreground "LightBlue"))))
     ;; (gnus-group-news-3-face ((t (:bold t :foreground "LightBlue"))))
     (gnus-group-news-4-empty-face ((t (:foreground "Aquamarine"))))
     (gnus-group-news-4-face ((t (:bold t :foreground "Aquamarine"))))
     (gnus-group-news-5-empty-face ((t (:foreground "MediumAquamarine"))))
     (gnus-group-news-5-face ((t (:bold t :foreground "MediumAquamarine"))))
     (gnus-group-news-6-empty-face ((t (:foreground "MediumAquamarine"))))
     (gnus-group-news-6-face ((t (:bold t :foreground "MediumAquamarine"))))
     (gnus-group-news-low-empty-face ((t (:foreground "MediumAquamarine"))))
     (gnus-group-news-low-face ((t (:bold t :foreground "MediumAquamarine"))))
     (gnus-emphasis-bold ((t (:bold t))))
     (gnus-emphasis-bold-italic ((t (:italic t :bold t))))
     (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
     (gnus-emphasis-italic ((t (:italic t))))
     (gnus-emphasis-underline ((t (:underline t))))
     (gnus-emphasis-underline-bold ((t (:bold t :underline t))))
     (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t))))
     (gnus-emphasis-underline-italic ((t (:italic t :underline t))))
     (gnus-header-content-face ((t (:foreground "LightSkyBlue3"))))
     (gnus-header-from-face ((t (:bold t :foreground "light cyan"))))
     (gnus-header-name-face ((t (:bold t :foreground "LightBlue"))))
     (gnus-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine"))))
     (gnus-header-subject-face ((t (:bold t :foreground "light cyan"))))
     (gnus-signature-face ((t (:foreground "Grey"))))
     (gnus-splash-face ((t (:foreground "ForestGreen"))))
     (gnus-summary-cancelled-face ((t (:background "Black" :foreground "Yellow"))))
     (gnus-summary-high-ancient-face ((t (:bold t :foreground "MediumAquamarine"))))
     (gnus-summary-high-read-face ((t (:bold t :foreground "Aquamarine"))))
     (gnus-summary-high-ticked-face ((t (:bold t :foreground "LightSalmon"))))
     (gnus-summary-high-unread-face ((t (:bold t :foreground "beige"))))
     (gnus-summary-low-ancient-face ((t (:foreground "DimGray"))))
     (gnus-summary-low-read-face ((t (:foreground "slate gray"))))
     (gnus-summary-low-ticked-face ((t (:foreground "Pink"))))
     (gnus-summary-low-unread-face ((t (:foreground "LightGray"))))
     (gnus-summary-normal-ancient-face ((t (:foreground "MediumAquamarine"))))
     (gnus-summary-normal-read-face ((t (:foreground "Aquamarine"))))
     (gnus-summary-normal-ticked-face ((t (:foreground "LightSalmon"))))
     (gnus-summary-normal-unread-face ((t (nil))))
     (gnus-summary-selected-face ((t (:background "DarkSlateBlue"))))
     (gnus-notify+-modeline-face ((t (:foreground "cornflower blue"))))
     (message-cited-text-face ((t (:foreground "LightSalmon"))))
     (message-header-cc-face ((t (:foreground "light cyan"))))
     (message-header-name-face ((t (:foreground "maroon1"))))
     (message-header-newsgroups-face ((t (:bold t :foreground "MediumAquamarine"))))
     (message-header-other-face ((t (:foreground "RoyalBlue1"))))
     (message-header-subject-face ((t (:bold t :foreground "DeepSkyBlue1"))))
     (message-header-to-face ((t (:bold t :foreground "PaleTurquoise1"))))
     (message-header-xheader-face ((t (:foreground "MediumAquamarine"))))
     (message-separator-face ((t (:foreground "steel blue"))))
     (jabber-chat-prompt-foreign ((t (:foreground "slate blue" :weight bold))))
     (jabber-chat-prompt-local ((t (:foreground "hot pink" :weight bold))))
     (jabber-roster-user-away ((t (:foreground "light coral" :slant italic :weight normal))))
     (jabber-roster-user-online ((t (:foreground "dodger blue" :slant normal :weight bold))))
     (org-date ((t (:foreground "light pink" :underline t))))
     ;; (rw-hunspell-default-dictionary "en_US_myspell")
     ;; (rw-hunspell-dicpath-list (quote ("/usr/share/myspell/dicts")))
     ;; (rw-hunspell-make-dictionary-menu t)
     ;; (rw-hunspell-use-rw-ispell t)
     )))

;;;;;;;;;;;;;;;;;;;;  color theme dimilar tty  ;;;;;;;;;;;;;;;;;;;;
(defun color-theme-dimilartty ()
  "A color theme based on Tango Palette."
  (interactive)
  (color-theme-install
   '(color-theme-dimilartty
     ((help-highlight-face . underline)
      (ibuffer-dired-buffer-face . font-lock-function-name-face)
      (ibuffer-help-buffer-face . font-lock-comment-face)
      (ibuffer-hidden-buffer-face . font-lock-warning-face)
      (ibuffer-occur-match-face . font-lock-warning-face)
      (ibuffer-read-only-buffer-face . font-lock-type-face)
      (ibuffer-special-buffer-face . font-lock-keyword-face)
      (ibuffer-title-face . font-lock-type-face))
     (font-lock-builtin-face ((((class color) (min-colors 8)) (:foreground "magenta" :weight bold))))
     (font-lock-comment-face ((t (:foreground "blue" :slant italic :weight bold))))
     (font-lock-function-name-face ((((class color) (min-colors 8)) (:foreground "cyan" :weight bold))))
     (font-lock-variable-name-face ((((class color) (min-colors 8)) (:foreground "red" :weight light))))
     (info-menu-header ((((type tty pc)) (:foreground "cyan" :underline t :weight bold))))
     (info-node ((t (:foreground "magenta" :slant italic :weight bold))))
     (info-title-3 ((((type tty pc) (class color)) (:foreground "blue" :weight bold))))
     (info-title-4 ((((type tty pc) (class color)) (:foreground "cyan" :weight bold))))
     (info-xref ((t (:foreground "cyan"))))
     (info-xref-visited ((t (:foreground "red"))))
     (linum ((t (:foreground "magenta"))))
     (flymake-errline ((t (:background "red" :weight bold))))
     (flymake-warnline ((t (:background "darkblue" :weight bold))))
     (flyspell-incorrect ((t (:foreground "dodger blue" :underline t :weight bold))))
     (org-code ((((class color grayscale) (min-colors 88) (background dark)) (:foreground "DeepSkyBlue4"))))
     (w3m-anchor ((t (:foreground "cyan" :underline t))))
     (w3m-arrived-anchor ((t (:foreground "green" :underline t))))
     (w3m-bold ((t (:foreground "white" :weight bold))))
     (w3m-current-anchor ((t (:foreground "magenta" :underline t :weight bold))))
     (w3m-form-button ((t (:foreground "blue" :underline t))))
     (w3m-form-button-mouse ((t (:foreground "cyan" :underline t))))
     (w3m-form-button-pressed ((t (:foreground "green" :underline t))))
     (w3m-header-line-location-content ((nil (:foreground "red"))))
     (w3m-header-line-location-title ((nil (:foreground "cyan"))))
     (w3m-history-current-url ((t (:background "DodgerBlue4"))))
     (w3m-italic ((t (:foreground "magenta" :slant italic))))
     (w3m-tab-background ((((class color)) (:background "white" :foreground "magenta"))))
     (w3m-tab-mouse ((nil (:foreground "blue"))))
     (w3m-underline ((t (:foreground "green" :underline t)))))))

;;;;;;;;;;;;;;;;;;;;  color theme jimmy  ;;;;;;;;;;;;;;;;;;;;
(defun color-theme-jimmy ()
  "Color theme by Jimmy.NG, created 2009-07-23."
  (interactive)
  (color-theme-install
   '(my-color-theme
     ((background-color . "#1e1e27")
      (foreground-color . "#CFBFAD")
      (background-mode . dark)
      (border-color . "black")
      (cursor-color . "#4685aa")
      ;; (foreground-color . "#cccccc")
      (mouse-color . "black"))
     ((blank-hspace-face . blank-hspace-face)
      (blank-line-face . blank-line-face)
      (blank-map-face . blank-map-face)
      (blank-space-before-tab-face . blank-space-before-tab-face)
      (blank-space-face . blank-space-face)
      (blank-tab-face . blank-tab-face)
      (blank-trailing-face . blank-trailing-face)
      (browse-kill-ring-separator-face . bold)
      (gnus-mouse-face . highlight)
      (gnus-summary-selected-face . gnus-summary-selected)
      (goto-address-mail-face . italic)
      (goto-address-mail-mouse-face . secondary-selection)
      (goto-address-url-face . link)
      (goto-address-url-mouse-face . highlight)
      (ibuffer-deletion-face . font-lock-type-face)
      (ibuffer-filter-group-name-face . bold)
      (ibuffer-marked-face . font-lock-warning-face)
      (ibuffer-title-face . font-lock-type-face)
      (list-matching-lines-buffer-name-face . underline)
      (list-matching-lines-face . match)
      (org-goto-interface . outline)
      (org-remember-interactive-interface . refile)
      (php-default-face . default)
      (tags-tag-face . default)
      (view-highlight-face . highlight)
      (widget-mouse-face . highlight))
     (default ((t (:stipple nil :background "black" :foreground "#cccccc" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 113 :width normal :foundry "outline" :family "Monaco"))))
     (blank-hspace-face ((t (:background "CadetBlue5" :foreground "Aquamarine3"))))
     (blank-line-face ((t (:background "gray20" :foreground "violet"))))
     (blank-map-face ((t (:bold t :background "CadetBlue5" :foreground "Aquamarine3" :weight bold))))
     (blank-space-before-tab-face ((t (:background "DarkOrange" :foreground "firebrick"))))
     (blank-space-face ((t (:background "SteelBlue4" :foreground "Aquamarine3"))))
     (blank-tab-face ((t (:background "SkyBlue4" :foreground "Aquamarine3"))))
     (blank-trailing-face ((t (:bold t :background "red1" :foreground "yellow" :weight bold))))
     (bold ((t (:bold t :weight bold))))
     (bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
     (bookmark-menu-heading ((t (:foreground "#ffff55"))))
     (border ((t (:background "black"))))
     (buffer-menu-buffer ((t (:bold t :weight bold))))
     (button ((t (:underline t))))
     (c-nonbreakable-space-face ((t (:bold t :background "#ff6600" :weight bold))))
     (calendar-today ((t (:foreground "#ff6633" :underline t))))
     (comint-highlight-input ((t (:bold t :weight bold))))
     (comint-highlight-prompt ((t (:foreground "#339900"))))
     (compilation-column-number ((t (:foreground "#ffff55"))))
     (compilation-error ((t (:bold t :foreground "#ff6600" :weight bold))))
     (compilation-info ((t (:bold t :foreground "Green1" :weight bold))))
     (compilation-line-number ((t (:foreground "#4682b4"))))
     (compilation-warning ((t (:bold t :foreground "Orange" :weight bold))))
     (completions-common-part ((t (:background "black" :foreground "#cccccc" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 113 :width normal :foundry "outline" :family "Monaco"))))
     (completions-first-difference ((t (:bold t :weight bold))))
     (cursor ((t (:background "#4685aa"))))
     (custom-button ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style released-button)))))
     (custom-button-mouse ((t (:background "grey90" :foreground "black" :box (:line-width 2 :style released-button)))))
     (custom-button-pressed ((t (:background "lightgrey" :foreground "black" :box (:line-width 2 :style pressed-button)))))
     (custom-button-pressed-unraised ((t (:foreground "violet"))))
     (custom-button-unraised ((t (nil))))
     (custom-changed ((t (:background "blue1" :foreground "white"))))
     (custom-comment ((t (:background "dim gray"))))
     (custom-comment-tag ((t (:foreground "gray80"))))
     (custom-documentation ((t (nil))))
     (custom-face-tag ((t (:bold t :foreground "light blue" :weight bold))))
     (custom-group-tag ((t (:bold t :foreground "light blue" :weight bold :height 1.2 :family "Sans Serif"))))
     (custom-group-tag-1 ((t (:bold t :foreground "pink" :weight bold :height 1.2 :family "Sans Serif"))))
     (custom-invalid ((t (:background "red1" :foreground "yellow1"))))
     (custom-link ((t (:foreground "#7ec0ee"))))
     (custom-modified ((t (:background "blue1" :foreground "white"))))
     (custom-rogue ((t (:background "black" :foreground "pink"))))
     (custom-saved ((t (:underline t))))
     (custom-set ((t (:background "white" :foreground "blue1"))))
     (custom-state ((t (:foreground "lime green"))))
     (custom-themed ((t (:background "blue1" :foreground "white"))))
     (custom-variable-button ((t (:bold t :underline t :weight bold))))
     (custom-variable-tag ((t (:bold t :foreground "light blue" :weight bold))))
     (custom-visibility ((t (:foreground "#7ec0ee" :height 0.8))))
     (diary ((t (:foreground "yellow1"))))
     (dired-directory ((t (:foreground "#ffffa0"))))
     (dired-flagged ((t (:bold t :foreground "#ff9966" :weight bold))))
     (dired-header ((t (:foreground "#ffff55"))))
     (dired-ignored ((t (:foreground "#555555"))))
     (dired-mark ((t (:foreground "#78a355"))))
     (dired-marked ((t (:background "#222222"))))
     (dired-perm-write ((t (:background "black" :foreground "#666699" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 113 :width normal :foundry "outline" :family "Monaco"))))
     (dired-symlink ((t (:foreground "#4682b4"))))
     (dired-warning ((t (:bold t :foreground "#ff6600" :weight bold))))
     (dropdown-list-face ((t (:background "#cccccc" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 113 :width normal :foundry "outline" :family "Monaco"))))
     (dropdown-list-selection-face ((t (:background "#999999" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 113 :width normal :foundry "outline" :family "Monaco"))))
     (ecb-analyse-bucket-element-face ((t (:height 1.0))))
     (ecb-analyse-bucket-node-face ((t (:bold t :weight bold :height 1.0))))
     (ecb-analyse-face ((t (:background "#006699" :foreground "yellow"))))
     (ecb-analyse-general-face ((t (:height 1.0))))
     (ecb-bucket-node-face ((t (:bold t :weight bold :height 1.0))))
     (ecb-default-general-face ((t (:height 1.0))))
     (ecb-default-highlight-face ((t (:background "#006699" :foreground "yellow"))))
     (ecb-directories-general-face ((t (:height 1.0))))
     (ecb-directory-face ((t (:background "#006699" :foreground "yellow"))))
     (ecb-directory-not-accessible-face ((t (:foreground "gray60" :height 1.0))))
     (ecb-history-bucket-node-face ((t (:bold t :weight bold :height 1.0))))
     (ecb-history-dead-buffer-face ((t (:foreground "gray60" :height 1.0))))
     (ecb-history-face ((t (:background "#006699" :foreground "yellow"))))
     (ecb-history-general-face ((t (:height 1.0))))
     (ecb-history-indirect-buffer-face ((t (:italic t :slant italic :height 1.0))))
     (ecb-method-face ((t (:background "#006699" :foreground "yellow"))))
     (ecb-method-non-semantic-face ((t (:foreground "brown" :height 1.0))))
     (ecb-methods-general-face ((t (:height 1.0))))
     (ecb-mode-line-data-face ((t (nil))))
     (ecb-mode-line-prefix-face ((t (:foreground "forestgreen"))))
     (ecb-mode-line-win-nr-face ((t (:bold t :weight bold))))
     (ecb-source-face ((t (:background "#006699" :foreground "yellow"))))
     (ecb-source-in-directories-buffer-face ((t (:foreground "LightBlue1" :height 1.0))))
     (ecb-source-read-only-face ((t (:italic t :slant italic :height 1.0))))
     (ecb-sources-general-face ((t (:height 1.0))))
     (ecb-tag-header-face ((t (:background "#339900" :foreground "#ffffff"))))
     (ecb-tree-guide-line-face ((t (:foreground "gray" :height 1.0))))
     (ecb-type-tag-class-face ((t (:bold t :weight bold))))
     (ecb-type-tag-enum-face ((t (:bold t :weight bold))))
     (ecb-type-tag-group-face ((t (:bold t :foreground "dim gray" :weight bold))))
     (ecb-type-tag-interface-face ((t (:bold t :weight bold))))
     (ecb-type-tag-struct-face ((t (:bold t :weight bold))))
     (ecb-type-tag-typedef-face ((t (:bold t :weight bold))))
     (ecb-type-tag-union-face ((t (:bold t :weight bold))))
     (eieio-custom-slot-tag-face ((t (:foreground "light blue"))))
     (emms-playlist-selected-face ((t (:foreground "SteelBlue3"))))
     (emms-playlist-track-face ((t (:foreground "DarkSeaGreen"))))
     (escape-glyph ((t (:foreground "#999933"))))
     (ffap ((t (:background "#333333"))))
     (file-name-shadow ((t (:foreground "grey70"))))
     (fixed-pitch ((t (:family "Monospace"))))
     (font-latex-bold-face ((t (:bold t :foreground "OliveDrab" :weight bold))))
     (font-latex-doctex-documentation-face ((t (:background "#333"))))
     (font-latex-doctex-preprocessor-face ((t (:background "#333"))))
     (font-latex-italic-face ((t (:foreground "OliveDrab" :underline t))))
     (font-latex-math-face ((t (:foreground "burlywood"))))
     (font-latex-sectioning-0-face ((t (:foreground "yellow" :height 1.6105100000000008 :family "Sans Serif"))))
     (font-latex-sectioning-1-face ((t (:foreground "yellow" :height 1.4641000000000006 :family "Sans Serif"))))
     (font-latex-sectioning-2-face ((t (:foreground "yellow" :height 1.3310000000000004 :family "Sans Serif"))))
     (font-latex-sectioning-3-face ((t (:foreground "yellow" :height 1.2100000000000002 :family "Sans Serif"))))
     (font-latex-sectioning-4-face ((t (:foreground "yellow" :height 1.1 :family "Sans Serif"))))
     (font-latex-sectioning-5-face ((t (:foreground "yellow" :family "Sans Serif"))))
     (font-latex-sedate-face ((t (:foreground "LightGray"))))
     (font-latex-slide-title-face ((t (:bold t :weight bold :height 1.2 :family "Sans Serif"))))
     (font-latex-string-face ((t (:foreground "#e6db74"))))
     (font-latex-subscript-face ((t (:height 0.8))))
     (font-latex-superscript-face ((t (:height 0.8))))
     (font-latex-verbatim-face ((t (:foreground "burlywood" :family "Monospace"))))
     (font-latex-warning-face ((t (:bold t :foreground "red" :weight bold))))
     (font-lock-builtin-face ((t (:foreground "#f3715c"))))
     (font-lock-comment-delimiter-face ((t (:foreground "#95917e"))))
     (font-lock-comment-face ((t (:foreground "#95917e"))))
     (font-lock-constant-face ((t (:foreground "#78a355"))))
     (font-lock-doc-face ((t (:foreground "#555555"))))
     (font-lock-function-name-face ((t (:foreground "#8FDE2B"))))
     (font-lock-keyword-face ((t (:foreground "#4682b4"))))
     (font-lock-negation-char-face ((t (:foreground "#df9464"))))
     (font-lock-preprocessor-face ((t (:foreground "plum"))))
     (font-lock-regexp-grouping-backslash ((t (:bold t :weight bold))))
     (font-lock-regexp-grouping-construct ((t (:bold t :weight bold))))
     (font-lock-string-face ((t (:foreground "#967cab"))))
     (font-lock-type-face ((t (:foreground "#ffff55"))))
     (font-lock-variable-name-face ((t (:foreground "#4682b4"))))
     (font-lock-warning-face ((t (:bold t :foreground "#ff6600" :weight bold))))
     (fringe ((t (:background "black" :foreground "#555555"))))
     (gnus-button ((t (:bold t :weight bold))))
     (gnus-emphasis-bold ((t (:bold t :weight bold))))
     (gnus-emphasis-bold-italic ((t (:italic t :bold t :slant italic :weight bold))))
     (gnus-emphasis-highlight-words ((t (:background "black" :foreground "yellow"))))
     (gnus-emphasis-italic ((t (:italic t :slant italic))))
     (gnus-emphasis-strikethru ((t (:strike-through t))))
     (gnus-emphasis-underline ((t (:underline t))))
     (gnus-emphasis-underline-bold ((t (:bold t :underline t :weight bold))))
     (gnus-emphasis-underline-bold-italic ((t (:italic t :bold t :underline t :slant italic :weight bold))))
     (gnus-emphasis-underline-italic ((t (:italic t :underline t :slant italic))))
     (gnus-group-mail-1 ((t (:bold t :foreground "#e1ffe1" :weight bold))))
     (gnus-group-mail-1-empty ((t (:foreground "#e1ffe1"))))
     (gnus-group-mail-2 ((t (:bold t :foreground "DarkSeaGreen1" :weight bold))))
     (gnus-group-mail-2-empty ((t (:foreground "DarkSeaGreen1"))))
     (gnus-group-mail-3 ((t (:bold t :foreground "aquamarine1" :weight bold))))
     (gnus-group-mail-3-empty ((t (:foreground "aquamarine1"))))
     (gnus-group-mail-low ((t (:bold t :foreground "aquamarine2" :weight bold))))
     (gnus-group-mail-low-empty ((t (:foreground "aquamarine2"))))
     (gnus-group-news-1 ((t (:bold t :foreground "PaleTurquoise" :weight bold))))
     (gnus-group-news-1-empty ((t (:foreground "PaleTurquoise"))))
     (gnus-group-news-2 ((t (:bold t :foreground "turquoise" :weight bold))))
     (gnus-group-news-2-empty ((t (:foreground "turquoise"))))
     (gnus-group-news-3 ((t (:bold t :weight bold))))
     (gnus-group-news-3-empty ((t (nil))))
     (gnus-group-news-4 ((t (:bold t :weight bold))))
     (gnus-group-news-4-empty ((t (nil))))
     (gnus-group-news-5 ((t (:bold t :weight bold))))
     (gnus-group-news-5-empty ((t (nil))))
     (gnus-group-news-6 ((t (:bold t :weight bold))))
     (gnus-group-news-6-empty ((t (nil))))
     (gnus-group-news-low ((t (:bold t :foreground "DarkTurquoise" :weight bold))))
     (gnus-group-news-low-empty ((t (:foreground "DarkTurquoise"))))
     (gnus-header-content ((t (:italic t :foreground "SpringGreen1" :slant italic))))
     (gnus-header-from ((t (:foreground "PaleGreen1"))))
     (gnus-header-name ((t (:foreground "SpringGreen2"))))
     (gnus-header-newsgroups ((t (:italic t :foreground "yellow" :slant italic))))
     (gnus-header-subject ((t (:foreground "SeaGreen1"))))
     (gnus-signature ((t (:italic t :slant italic))))
     (gnus-splash ((t (:foreground "#cccccc"))))
     (gnus-summary-cancelled ((t (:background "black" :foreground "yellow"))))
     (gnus-summary-high-ancient ((t (:bold t :foreground "SkyBlue" :weight bold))))
     (gnus-summary-high-read ((t (:bold t :foreground "PaleGreen" :weight bold))))
     (gnus-summary-high-ticked ((t (:bold t :foreground "pink" :weight bold))))
     (gnus-summary-high-undownloaded ((t (:bold t :foreground "LightGray" :weight bold))))
     (gnus-summary-high-unread ((t (:bold t :weight bold))))
     (gnus-summary-low-ancient ((t (:italic t :foreground "SkyBlue" :slant italic))))
     (gnus-summary-low-read ((t (:italic t :foreground "PaleGreen" :slant italic))))
     (gnus-summary-low-ticked ((t (:italic t :foreground "pink" :slant italic))))
     (gnus-summary-low-undownloaded ((t (:italic t :foreground "LightGray" :slant italic :weight normal))))
     (gnus-summary-low-unread ((t (:italic t :slant italic))))
     (gnus-summary-normal-ancient ((t (:foreground "SkyBlue"))))
     (gnus-summary-normal-read ((t (:foreground "PaleGreen"))))
     (gnus-summary-normal-ticked ((t (:foreground "pink"))))
     (gnus-summary-normal-undownloaded ((t (:foreground "LightGray" :weight normal))))
     (gnus-summary-normal-unread ((t (nil))))
     (gnus-summary-selected ((t (:underline t))))
     (header-line ((t (:background "black" :foreground "white" :box nil))))
     (help-argument-name ((t (nil))))
     (hi-black-b ((t (:bold t :weight bold))))
     (hi-black-hb ((t (:bold t :weight bold :height 1.67 :family "Sans Serif"))))
     (hi-blue ((t (:background "light blue" :foreground "black"))))
     (hi-blue-b ((t (:bold t :foreground "blue1" :weight bold))))
     (hi-green ((t (:background "green1" :foreground "black"))))
     (hi-green-b ((t (:bold t :foreground "green1" :weight bold))))
     (hi-pink ((t (:background "pink" :foreground "black"))))
     (hi-red-b ((t (:bold t :foreground "red1" :weight bold))))
     (hi-yellow ((t (:background "yellow1" :foreground "black"))))
     (highlight ((t (:background "#333333"))))
     (highlight-changes ((t (:foreground "red1"))))
     (highlight-changes-delete ((t (:foreground "red1" :underline t))))
     (holiday ((t (:background "chocolate4"))))
     (ido-first-match ((t (:foreground "pink"))))
     (ido-incomplete-regexp ((t (:bold t :foreground "#ff6600" :weight bold))))
     (ido-indicator ((t (:background "red1" :foreground "yellow1" :width condensed))))
     (ido-only-match ((t (:foreground "#4685aa"))))
     (ido-subdir ((t (:foreground "#b9fc6d"))))
     (info-header-node ((t (:italic t :bold t :foreground "white" :slant italic :weight bold))))
     (info-header-xref ((t (:foreground "#7ec0ee"))))
     (info-menu-header ((t (:bold t :weight bold :family "Sans Serif"))))
     (info-menu-star ((t (:foreground "red1"))))
     (info-node ((t (:italic t :bold t :foreground "white" :slant italic :weight bold))))
     (info-title-1 ((t (:bold t :weight bold :height 1.728 :family "Sans Serif"))))
     (info-title-2 ((t (:bold t :weight bold :height 1.44 :family "Sans Serif"))))
     (info-title-3 ((t (:bold t :weight bold :height 1.2 :family "Sans Serif"))))
     (info-title-4 ((t (:bold t :weight bold :family "Sans Serif"))))
     (info-xref ((t (:foreground "#7ec0ee"))))
     (info-xref-visited ((t (:foreground "violet"))))
     (isearch ((t (:background "#7ec0ee" :foreground "black"))))
     (isearch-fail ((t (:background "red4"))))
     (italic ((t (:underline t))))
     (lazy-highlight ((t (:background "paleturquoise4" :foreground "black"))))
     (link ((t (:foreground "#7ec0ee"))))
     (link-visited ((t (:foreground "violet"))))
     (match ((t (:background "RoyalBlue3"))))
     ;;(menu ((t (:background "systemmenu" :foreground "systemmenutext"))))
     (message-cited-text ((t (:foreground "LightPink1"))))
     (message-header-cc ((t (:bold t :foreground "chartreuse1" :weight bold))))
     (message-header-name ((t (:foreground "green"))))
     (message-header-newsgroups ((t (:italic t :bold t :foreground "yellow" :slant italic :weight bold))))
     (message-header-other ((t (:foreground "VioletRed1"))))
     (message-header-subject ((t (:foreground "OliveDrab1"))))
     (message-header-to ((t (:bold t :foreground "DarkOliveGreen1" :weight bold))))
     (message-header-xheader ((t (:foreground "DeepSkyBlue1"))))
     (message-mml ((t (:foreground "MediumSpringGreen"))))
     (message-separator ((t (:foreground "LightSkyBlue1"))))
     (minibuffer-prompt ((t (:foreground "#555555"))))
     (mm-uu-extract ((t (:background "dark green" :foreground "light yellow"))))
     ;; (mode-line ((t (:background "#333333" :foreground "#6699cc" :box (:line-width 1 :color "#626262")))))
     (mode-line-buffer-id ((t (:foreground "#cbeff9"))))
     (mode-line-emphasis ((t (:foreground "#99ccff"))))
     (mode-line-highlight ((t (:foreground "#55ff55"))))
     (mode-line ((t (:foreground "#eeeeec" :background "#555753"))))
     ;; (mode-line-inactive ((t (:background "#333333" :foreground "#ffffff" :box (:line-width 1 :color "#626262")))))
     (mouse ((t (:background "black"))))
     (next-error ((t (:background "#333333"))))
     (nobreak-space ((t (:foreground "#999933" :underline t))))
     (org-agenda-column-dateline ((t (:background "grey30" :strike-through nil :underline nil :slant normal :weight normal :height 113 :family "Monaco"))))
     (org-agenda-date ((t (nil))))
     (org-agenda-date-today ((t (:italic t :bold t :slant italic :weight bold))))
     (org-agenda-date-weekend ((t (:bold t :weight bold))))
     (org-agenda-dimmed-todo-face ((t (:foreground "grey50"))))
     (org-agenda-done ((t (:foreground "PaleGreen"))))
     (org-agenda-restriction-lock ((t (:background "skyblue4"))))
     (org-agenda-structure ((t (:foreground "LightSkyBlue"))))
     (org-archived ((t (:foreground "grey70"))))
     (org-block ((t (:foreground "grey70"))))
     (org-checkbox ((t (:bold t :weight bold))))
     (org-checkbox-statistics-done ((t (nil))))
     (org-checkbox-statistics-todo ((t (nil))))
     (org-clock-overlay ((t (:background "SkyBlue4"))))
     (org-code ((t (:foreground "#555555"))))
     (org-column ((t (:background "grey30" :strike-through nil :underline nil :slant normal :weight normal :height 113 :family "Monaco"))))
     (org-column-title ((t (:bold t :background "grey30" :underline t :weight bold))))
     (org-date ((t (:foreground "#50b7c1"))))
     (org-done ((t (:bold t :foreground "PaleGreen" :weight bold))))
     (org-drawer ((t (:foreground "LightSkyBlue"))))
     (org-ellipsis ((t (:foreground "LightGoldenrod" :underline t))))
     (org-footnote ((t (:foreground "#339900"))))
     (org-formula ((t (:foreground "chocolate1"))))
     (org-headline-done ((t (:foreground "LightSalmon"))))
     (org-hide ((t (:foreground "black"))))
     (org-latex-and-export-specials ((t (:foreground "burlywood"))))
     (org-level-1 ((t (:foreground "#5555ff"))))
     (org-level-2 ((t (:foreground "#ffff55"))))
     (org-level-3 ((t (:foreground "#008ed1"))))
     (org-level-4 ((t (:foreground "#ff55ff"))))
     (org-level-5 ((t (:foreground "#b9fc6d"))))
     (org-level-6 ((t (:foreground "#9651cc"))))
     (org-level-7 ((t (:foreground "#f3715c"))))
     (org-level-8 ((t (:foreground "#7ec0ee"))))
     (org-link ((t (:foreground "#cccccc" :underline t))))
     (org-meta-line ((t (:foreground "#95917e"))))
     (org-mode-line-clock ((t (nil))))
     (org-property-value ((t (nil))))
     (org-scheduled ((t (:foreground "PaleGreen"))))
     (org-scheduled-previously ((t (:foreground "chocolate1"))))
     (org-scheduled-today ((t (:foreground "PaleGreen"))))
     (org-sexp-date ((t (:foreground "#50b7c1"))))
     (org-special-keyword ((t (:foreground "LightSalmon"))))
     (org-table ((t (:foreground "#555555"))))
     (org-tag ((t (:bold t :foreground "#55ff55" :weight bold))))
     (org-target ((t (:underline t))))
     (org-time-grid ((t (:foreground "LightGoldenrod"))))
     (org-todo ((t (:bold t :foreground "#ff5555" :weight bold))))
     (org-upcoming-deadline ((t (:foreground "chocolate1"))))
     (org-verbatim ((t (:foreground "#555555" :underline t))))
     (org-warning ((t (:bold t :foreground "#ff6600" :weight bold))))
     (outline-1 ((t (:foreground "#FCAF3E"))))
     (outline-2 ((t (:foreground "#4682b4"))))
     (outline-3 ((t (:foreground "#4682b4"))))
     (outline-4 ((t (:foreground "#95917e"))))
     (outline-5 ((t (:foreground "#ffff55"))))
     (outline-6 ((t (:foreground "#78a355"))))
     (outline-7 ((t (:foreground "#f3715c"))))
     (outline-8 ((t (:foreground "#7ec0ee"))))
     (preview-face ((t (:background "dark slate gray"))))
     (preview-reference-face ((t (nil))))
     (proced-mark ((t (:foreground "#78a355"))))
     (proced-marked ((t (:bold t :foreground "#ff6600" :weight bold))))
     (proced-sort-header ((t (:foreground "#4682b4"))))
     (pulse-highlight-face ((t (:background "#AAAA33"))))
     (pulse-highlight-start-face ((t (:background "#AAAA33"))))
     (query-replace ((t (:background "#7ec0ee" :foreground "black"))))
     (rcirc-bright-nick ((t (:foreground "Aquamarine"))))
     (rcirc-dim-nick ((t (:background "black" :foreground "#cccccc" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 113 :width normal :foundry "outline" :family "Monaco"))))
     (rcirc-keyword ((t (:background "#333333"))))
     (rcirc-my-nick ((t (:foreground "LightSkyBlue"))))
     (rcirc-nick-in-message ((t (:foreground "Cyan1"))))
     (rcirc-nick-in-message-full-line ((t (:bold t :weight bold))))
     (rcirc-other-nick ((t (:foreground "LightGoldenrod"))))
     (rcirc-prompt ((t (:foreground "cyan1"))))
     (rcirc-server ((t (:foreground "chocolate1"))))
     (rcirc-server-prefix ((t (:foreground "chocolate1"))))
     (rcirc-timestamp ((t (:background "black" :foreground "#cccccc" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 113 :width normal :foundry "outline" :family "Monaco"))))
     (rcirc-track-keyword ((t (:bold t :weight bold))))
     (rcirc-track-nick ((t (nil))))
     (rcirc-url ((t (:bold t :weight bold))))
     (region ((t (:background "#333333"))))
     (rst-level-1-face ((t (:background "grey85"))))
     (rst-level-2-face ((t (:background "grey78"))))
     (rst-level-3-face ((t (:background "grey71"))))
     (rst-level-4-face ((t (:background "grey64"))))
     (rst-level-5-face ((t (:background "grey57"))))
     (rst-level-6-face ((t (:background "grey50"))))
     ;; (scroll-bar ((t (:foreground "systemscrollbar"))))
     (secondary-selection ((t (:background "SkyBlue4"))))
     (semantic-decoration-on-includes ((t (nil))))
     (semantic-decoration-on-private-members-face ((t (:background "#200000"))))
     (semantic-decoration-on-protected-members-face ((t (:background "#000020"))))
     (semantic-decoration-on-unknown-includes ((t (:background "#900000"))))
     (semantic-decoration-on-unparsed-includes ((t (:background "#555500"))))
     (semantic-highlight-edits-face ((t (:background "gray20"))))
     (semantic-highlight-func-current-tag-face ((t (:background "gray20"))))
     (semantic-tag-boundary-face ((t (:overline "cyan"))))
     (semantic-unmatched-syntax-face ((t (:underline "red"))))
     (shadow ((t (:foreground "grey70"))))
     (show-paren-match ((t (:foreground "pink"))))
     (show-paren-mismatch ((t (:background "purple" :foreground "white"))))
     (speedbar-button-face ((t (:foreground "green3"))))
     (speedbar-directory-face ((t (:foreground "#cccccc"))))
     (speedbar-file-face ((t (:foreground "wheat"))))
     (speedbar-highlight-face ((t (:background "#333333"))))
     (speedbar-selected-face ((t (:foreground "#ff5500"))))
     (speedbar-separator-face ((t (:background "lightblue" :foreground "black"))))
     (speedbar-tag-face ((t (:foreground "yellow"))))
     (strokes-char ((t (:background "lightgray" :foreground "black"))))
     (tool-bar ((t (:background "systembuttonface" :foreground "systembuttontext" :box (:line-width 1 :style released-button)))))
     (tooltip ((t (:background "systeminfowindow" :foreground "systeminfotext" :family "Sans Serif"))))
     (trailing-whitespace ((t (:background "red" :foreground "white"))))
     (underline ((t (nil))))
     (variable-pitch ((t (:family "Sans Serif"))))
     (vertical-border ((t (nil))))
     (vhdl-font-lock-attribute-face ((t (:foreground "LightSteelBlue"))))
     (vhdl-font-lock-directive-face ((t (:foreground "Aquamarine"))))
     (vhdl-font-lock-enumvalue-face ((t (:foreground "BurlyWood"))))
     (vhdl-font-lock-function-face ((t (:foreground "Orchid1"))))
     (vhdl-font-lock-generic-/constant-face ((t (:foreground "BurlyWood1"))))
     (vhdl-font-lock-prompt-face ((t (:bold t :foreground "Pink" :weight bold))))
     (vhdl-font-lock-reserved-words-face ((t (:bold t :foreground "Yellow1" :weight bold))))
     (vhdl-font-lock-translate-off-face ((t (:background "DimGray"))))
     (vhdl-font-lock-type-face ((t (:foreground "PaleGreen"))))
     (vhdl-font-lock-variable-face ((t (:foreground "Grey80"))))
     (vhdl-speedbar-architecture-face ((t (:foreground "LightSkyBlue"))))
     (vhdl-speedbar-architecture-selected-face ((t (:foreground "LightSkyBlue" :underline t))))
     (vhdl-speedbar-configuration-face ((t (:foreground "Salmon"))))
     (vhdl-speedbar-configuration-selected-face ((t (:foreground "Salmon" :underline t))))
     (vhdl-speedbar-entity-face ((t (:foreground "PaleGreen"))))
     (vhdl-speedbar-entity-selected-face ((t (:foreground "PaleGreen" :underline t))))
     (vhdl-speedbar-instantiation-face ((t (:foreground "Yellow1"))))
     (vhdl-speedbar-instantiation-selected-face ((t (:foreground "Yellow" :underline t))))
     (vhdl-speedbar-library-face ((t (:foreground "Orchid1"))))
     (vhdl-speedbar-package-face ((t (:foreground "Grey80"))))
     (vhdl-speedbar-package-selected-face ((t (:foreground "Grey80" :underline t))))
     (vhdl-speedbar-subprogram-face ((t (:foreground "BurlyWood2"))))
     (which-func ((t (:foreground "orange"))))
     (widget-button ((t (:bold t :weight bold))))
     (widget-button-pressed ((t (:foreground "red1"))))
     (widget-documentation ((t (:foreground "#b9fc6d"))))
     (widget-field ((t (:background "dim gray"))))
     (widget-inactive ((t (:foreground "grey70"))))
     (widget-single-line-field ((t (:background "dim gray"))))
     (woman-addition ((t (:foreground "orange"))))
     (woman-bold ((t (:bold t :foreground "yellow" :weight bold))))
     (woman-italic ((t (:italic t :underline t :slant italic))))
     (woman-symbol ((t (nil))))
     (woman-unknown ((t (:foreground "red"))))
     (yas/field-highlight-face ((t (:background "DimGrey"))))
     (yas/mirror-highlight-face ((t (:background "gray22")))))))


;;;;;;;;;;;;;;;;;;;;  color theme tango  ;;;;;;;;;;;;;;;;;;;;
(defun color-theme-tango ()
  "A color theme based on Tango Palette."
  (interactive)
  (color-theme-install
   '(color-theme-tango
     ((background-color . "#2e3436")
      (background-mode . dark)
      (border-color . "#888a85")
      (cursor-color . "#fce94f")
      (foreground-color . "#eeeeec")
      (mouse-color . "#8ae234"))
     ((help-highlight-face . underline)
      (ibuffer-dired-buffer-face . font-lock-function-name-face)
      (ibuffer-help-buffer-face . font-lock-comment-face)
      (ibuffer-hidden-buffer-face . font-lock-warning-face)
      (ibuffer-occur-match-face . font-lock-warning-face)
      (ibuffer-read-only-buffer-face . font-lock-type-face)
      (ibuffer-special-buffer-face . font-lock-keyword-face)
      (ibuffer-title-face . font-lock-type-face))
     (border ((t (:background "#888a85"))))
     (fringe ((t (:background "grey10"))))
     (mode-line ((t (:foreground "#eeeeec" :background "#555753"))))
     (region ((t (:background "#555753"))))
     (font-lock-builtin-face ((t (:foreground "#729fcf"))))
     (font-lock-comment-face ((t (:foreground "#888a85"))))
     (font-lock-constant-face ((t (:foreground "#8ae234"))))
     (font-lock-doc-face ((t (:foreground "#888a85"))))
     (font-lock-keyword-face ((t (:foreground "#729fcf" :bold t))))
     (font-lock-string-face ((t (:foreground "#ad7fa8" :italic t))))
     (font-lock-type-face ((t (:foreground "#8ae234" :bold t))))
     (font-lock-variable-name-face ((t (:foreground "#eeeeec"))))
     (font-lock-warning-face ((t (:bold t :foreground "#f57900"))))
     (font-lock-function-name-face ((t (:foreground "#edd400" :bold t :italic t))))
     (comint-highlight-input ((t (:italic t :bold t))))
     (comint-highlight-prompt ((t (:foreground "#8ae234"))))
     (isearch ((t (:background "#f57900" :foreground "#2e3436"))))
     (isearch-lazy-highlight-face ((t (:foreground "#2e3436" :background "#e9b96e"))))
     (show-paren-match-face ((t (:foreground "#2e3436" :background "#73d216"))))
     (show-paren-mismatch-face ((t (:background "#ad7fa8" :foreground "#2e3436"))))
     (minibuffer-prompt ((t (:foreground "#729fcf" :bold t))))
     ;; (org-format-latex-options (quote (:foreground default :background default :scale 1.0 :html-foreground "black" :html-background "white" :html-scale 1.0 :matchers ("begin" "$1" "$" "$$" "\\(" "\\["))))
     ;; (org-date ((t (:foreground "light pink" :underline t))))
     (info-xref ((t (:foreground "#729fcf"))))
     (info-xref-visited ((t (:foreground "#ad7fa8"))))
     )))

;;;;;;;;;;;;;;;;;;;;  color them tangotango  ;;;;;;;;;;;;;;;;;;;;
(defun color-theme-tangotango ()
  "A color theme based on Tango Palette."
  (interactive)
  (color-theme-install
   '(color-theme-tangotango
     ((background-mode . dark)
      (background-color . "#1e1e27")
      (foreground-color . "#CFBFAD")
      (cursor-color     . "#8B8BFF")
      (mouse-color      . "gold1"))
     ((help-highlight-face . underline)
      (ibuffer-dired-buffer-face . font-lock-function-name-face)
      (ibuffer-help-buffer-face . font-lock-comment-face)
      (ibuffer-hidden-buffer-face . font-lock-warning-face)
      (ibuffer-occur-match-face . font-lock-warning-face)
      (ibuffer-read-only-buffer-face . font-lock-type-face)
      (ibuffer-special-buffer-face . font-lock-keyword-face)
      (ibuffer-title-face . font-lock-type-face))
     (highlight ((t (:background "brown4" :foreground nil))))
     (border ((t (:background "#888a85"))))
     ;; (fringe ((t (:background "grey10"))))
     (mode-line ((t (:foreground "#eeeeec" :background "#555753" :box (:line-width 1 :color nil :style released-button)))))
     (mode-line-inactive ((t (:foreground "#bbbbbc" :background "#555753"))))
     (mode-line-buffer-id ((t (:bold t :foreground "#729fcf" :background nil))))
     (region ((t (:background "dark slate blue"))))
     (link ((t (:underline t :foreground "dodger blue"))))
     (custom-link ((t (:inherit 'link))))
     (match ((t (:bold t :background "#e9b96e" :foreground "#2e3436"))))
     (tool-tips ((t (:inherit 'variable-pitch :foreground "black" :background "lightyellow"))))
     (tooltip ((t (:inherit 'variable-pitch :foreground "black" :background "lightyellow"))))
     (bold ((t (:bold t :underline nil :background nil))))
     (italic ((t (:italic t :underline nil :background nil))))
     (font-lock-builtin-face ((t (:foreground "#729fcf"))))
     (font-lock-comment-face ((t (:foreground "#888a85"))))
     (font-lock-constant-face ((t (:foreground "#8ae234"))))
     (font-lock-doc-face ((t (:foreground "#888a85"))))
     (font-lock-keyword-face ((t (:foreground "#729fcf" :bold t))))
     (font-lock-string-face ((t (:foreground "#ad7fa8" :bold t :italic t))))
     (font-lock-type-face ((t (:foreground "#8ae234" :bold t))))
     (font-lock-variable-name-face ((t (:foreground "tomato"))))
     (font-lock-warning-face ((t (:bold t :foreground "#f57900"))))
     (font-lock-function-name-face ((t (:foreground "#edd400" :bold t))))
     (comint-highlight-input ((t (:italic t :bold t))))
     (comint-highlight-prompt ((t (:foreground "#8ae234"))))
     (isearch ((t (:background "#f57900" :foreground "#2e3436"))))
     (isearch-lazy-highlight-face ((t (:foreground "#2e3436" :background "#e9b96e"))))
     (show-paren-match-face ((t (:foreground "#2e3436" :background "#73d216"))))
     (show-paren-mismatch-face ((t (:background "#ad7fa8" :foreground "#2e3436"))))
     (minibuffer-prompt ((t (:foreground "#729fcf" :bold t))))
     (info-xref ((t (:foreground "#729fcf"))))
     (info-xref-visited ((t (:foreground "#ad7fa8"))))
     (diary-face ((t (:bold t :foreground "IndianRed"))))
     (eshell-ls-clutter-face ((t (:bold t :foreground "DimGray"))))
     (eshell-ls-executable-face ((t (:bold t :foreground "Coral"))))
     (eshell-ls-missing-face ((t (:bold t :foreground "black"))))
     (eshell-ls-special-face ((t (:bold t :foreground "Gold"))))
     (eshell-ls-symlink-face ((t (:bold t :foreground "White"))))
     (widget-button ((t (:bold t))))
     (widget-mouse-face ((t (:bold t :foreground "white" :background "brown4"))))
     (widget-field ((t (:foreground "orange" :background "gray30"))))
     (widget-single-line-field ((t (:foreground "orange" :background "gray30"))))
     (custom-group-tag ((t (:bold t :foreground "#edd400" :height 1.3))))
     (custom-variable-tag ((t (:bold t :foreground "#edd400" :height 1.1))))
     (custom-face-tag ((t (:bold t :foreground "#edd400" :height 1.1))))
     (custom-state-face ((t (:foreground "#729fcf"))))
     (custom-button  ((t (:box (:line-width 1 :style released-button) :background "grey50" :foreground "black"))))
     (custom-variable-button ((t (:inherit 'custom-button))))
     (custom-button-mouse  ((t (:inherit 'custom-button :background "grey60"))))
     (custom-button-unraised  ((t (:background "grey50" :foreground "black"))))
     (custom-button-mouse-unraised  ((t (:inherit 'custom-button-unraised :background "grey60"))))
     (custom-button-pressed  ((t (:inherit 'custom-button :box (:style pressed-button)))))
     (custom-button-mouse-pressed-unraised  ((t (:inherit 'custom-button-unraised :background "grey60"))))
     (custom-documentation ((t (:italic t))))
     (message-cited-text ((t (:foreground "#edd400")))) 
     (gnus-cite-face-1 ((t (:foreground "#ad7fa8"))))
     (gnus-cite-face-2 ((t (:foreground "sienna4"))))
     (gnus-cite-face-3 ((t (:foreground "khaki4"))))
     (gnus-cite-face-4 ((t (:foreground "PaleTurquoise4"))))
     (gnus-group-mail-1-empty-face ((t (:foreground "light cyan"))))
     (gnus-group-mail-1-face ((t (:bold t :foreground "light cyan"))))
     (gnus-group-mail-2-empty-face ((t (:foreground "turquoise"))))
     (gnus-group-mail-2-face ((t (:bold t :foreground "turquoise"))))
     (gnus-group-mail-3-empty-face ((t (:foreground "#729fcf"))))
     (gnus-group-mail-3-face ((t (:bold t :foreground "#edd400"))))
     (gnus-group-mail-low-empty-face ((t (:foreground "dodger blue"))))
     (gnus-group-mail-low-face ((t (:bold t :foreground "dodger blue"))))
     (gnus-group-news-1-empty-face ((t (:foreground "light cyan"))))
     (gnus-group-news-1-face ((t (:bold t :foreground "light cyan"))))
     (gnus-group-news-2-empty-face ((t (:foreground "turquoise"))))
     (gnus-group-news-2-face ((t (:bold t :foreground "turquoise"))))
     (gnus-group-news-3-empty-face ((t (:foreground "#729fcf"))))
     (gnus-group-news-3-face ((t (:bold t :foreground "#edd400"))))
     (gnus-group-news-low-empty-face ((t (:foreground "dodger blue"))))
     (gnus-group-news-low-face ((t (:bold t :foreground "dodger blue"))))
     (gnus-header-name-face ((t (:bold t :foreground "#729fcf"))))
     (gnus-header-from ((t (:bold t :foreground "#edd400"))))
     (gnus-header-subject ((t (:foreground "#edd400"))))
     (gnus-header-content ((t (:italic t :foreground "#8ae234"))))
     (gnus-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
     (gnus-signature-face ((t (:italic t :foreground "dark grey"))))
     (gnus-summary-cancelled-face ((t (:background "black" :foreground "yellow"))))
     (gnus-summary-high-ancient-face ((t (:bold t :foreground "rotal blue"))))
     (gnus-summary-high-read-face ((t (:bold t :foreground "lime green"))))
     (gnus-summary-high-ticked-face ((t (:bold t :foreground "tomato"))))
     (gnus-summary-high-unread-face ((t (:bold t :foreground "white"))))
     (gnus-summary-low-ancient-face ((t (:italic t :foreground "lime green"))))
     (gnus-summary-low-read-face ((t (:italic t :foreground "royal blue"))))
     (gnus-summary-low-ticked-face ((t (:italic t :foreground "dark red"))))
     (gnus-summary-low-unread-face ((t (:italic t :foreground "white"))))
     (gnus-summary-normal-ancient-face ((t (:foreground "royal blue"))))
     (gnus-summary-normal-read-face ((t (:foreground "lime green"))))
     (gnus-summary-normal-ticked-face ((t (:foreground "indian red"))))
     (gnus-summary-normal-unread-face ((t (:foreground "white"))))
     (gnus-summary-selected ((t (:background "brown4" :foreground "white"))))
     (message-header-name-face ((t (:foreground "tomato"))))
     (message-header-newsgroups-face ((t (:italic t :bold t :foreground "LightSkyBlue3"))))
     (message-header-other-face ((t (:foreground "LightSkyBlue3"))))
     (message-header-xheader-face ((t (:foreground "DodgerBlue3"))))
     (message-header-subject ((t (:foreground "white"))))
     (message-header-to ((t (:foreground "white"))))
     (message-header-cc ((t (:foreground "white"))))
     (company-template-field ((((background dark)) (:background "LightSkyBlue3" :foreground "black"))))
     (company-tooltip ((t (:background "lightgray" :foreground "black"))))
     (company-tooltip-selection ((t (:inherit company-tooltip :background "royal blue"))))
     (org-hide ((t (:foreground "#2e3436"))))
     (org-level-1 ((t (:bold t :foreground "dodger blue" :height 1.5))))
     (org-level-2 ((t (:bold t :foreground "#6ac214" :height 1.2))))
     (org-level-3 ((t (:bold t :foreground "#edd400" :height 1.1))))
     (org-level-4 ((t (:bold t :foreground "tomato" :height 1.0))))
     (org-date ((t (:underline t :foreground "magenta3"))))
     (org-footnote  ((t (:underline t :foreground "magenta3"))))
     (org-link ((t (:foreground "skyblue2" :background "#2e3436"))))
     (org-special-keyword ((t (:foreground "brown"))))
     (org-verbatim ((t (:foreground "#eeeeec" :underline t :slant italic))))
     (org-block ((t (:foreground "#bbbbbc"))))
     (org-quote ((t (:inherit org-block :slant italic))))
     (org-verse ((t (:inherit org-block :slant italic))))
     (org-todo ((t (:bold t :foreground "Red"))))
     (org-done ((t (:bold t :foreground "ForestGreen"))))
     (org-format-latex-options (quote (:foreground default :background default :scale 1.0 :html-foreground "black" :html-background "white" :html-scale 1.0 :matchers ("begin" "$1" "$" "$$" "\\(" "\\["))))
     (org-date ((t (:foreground "light pink" :underline t))))
     (anything-header ((t (:bold t :background "grey15" :foreground "#edd400")))))))

;;;;;;;;;;;;;;;;;;;;  gui setting  ;;;;;;;;;;;;;;;;;;;;
(cond ((not window-system)
       (setq frame-background-mode 'white)
       (add-to-list 'load-path emax-eimpath)
       (autoload 'eim-use-package "eim" "Another emacs input method")
       (require 'eim-extra)
       (global-set-key "\\" 'eim-insert-ascii)
       ;;(setq eim-use-tooltip nil)
       (register-input-method
        "eim-wb" "euc-cn" "german" 'eim-use-package
        "五笔" "汉字五笔输入法" "wb.txt")
       (register-input-method
        "eim-py" "euc-cn" "german" 'eim-use-package
        "拼音" "汉字拼音输入法" "py.txt")
       (server-start)
       (color-theme-dimilartty))
      ((eq window-system 'x)
       (if (> (x-display-pixel-width) 1280)
           (set-frame-font "consolas-15")
         (set-frame-font "consolas-13"))
       ;;(set-frame-font "Inconsolata-15")
       ;; (set-frame-font "Bitstream Vera Sans Mono-14")
       ;; (set-frame-font "Bitstream Vera Sans Mono-12")
       ;; (set-fontset-font (frame-parameter nil 'font)
       ;;                   'han "Bitstream Vera Sans Mono-12")
       (set-fontset-font (frame-parameter nil 'font)
                         'han '("WenQuanYi Micro Hei" . "unicode-bmp"))
       (set-fontset-font (frame-parameter nil 'font)
                         'cjk-misc '("WenQuanYi Micro Hei" . "unicode-bmp"))
       (set-fontset-font (frame-parameter nil 'font)
                         'bopomofo '("WenQuanYi Micro Hei" . "unicode-bmp"))
       (set-fontset-font (frame-parameter nil 'font)
                         'gb18030 '("WenQuanYi Micro Hei". "unicode-bmp"))
       ))
